﻿Public Class FrmEmpresa
    Inherits Trading.FrmBase

    ' Essa treta toda para poder fazer a pesquisa e o cadastro em locais diferentes (optado por UserControl)
    ' pois com tabcontrol não é possivel ocultar as abas e com panel um em cima do outro fica muito tosko
    ' Não seI qual é a do delegate se da de usar Handles na boa

    Private Sub Visualizar(ByVal estoquelocal As Model.Pessoa) Handles UcEmpresaPesquisa1.Visualizar
        ' Chama o UC de cadastro para alteração passando o id


        UcEmpresaCadastro1.Visualiza(estoquelocal)

        StatusFrm(FrmModo.Edit)
    End Sub


    Private Sub Incluir() Handles UcEmpresaPesquisa1.Incluir
        ' Algo assim
        UcEmpresaCadastro1.Novo()

        StatusFrm(FrmModo.Insert)
    End Sub

    Private Sub Salvo() Handles UcEmpresaCadastro1.Salvo
        StatusFrm(FrmModo.Viewer)
    End Sub

    Private Sub Cancelado() Handles UcEmpresaCadastro1.Cancelado
        StatusFrm(FrmModo.Viewer)
    End Sub

    Private Sub StatusFrm(ByVal Modo As FrmModo)
        If Modo = FrmModo.Insert Or Modo = FrmModo.Edit Then
            UcEmpresaPesquisa1.Visible = False
            UcEmpresaCadastro1.Visible = True
        End If
        If Modo = FrmModo.Viewer Then
            UcEmpresaPesquisa1.Visible = True
            UcEmpresaCadastro1.Visible = False
        End If
    End Sub

    Private Sub Sair() Handles UcEmpresaPesquisa1.Sair
        Me.Close()
    End Sub

End Class